home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 1996 #1 / Amiga Plus CD - 1996 - No. 1.iso / amigaplus_cd-rom_index / nr.3-4-95 < prev    next >
Text File  |  1995-11-09  |  1KB  |  33 lines
  1. ; (C) Sandro Paolini / s_paolini@pluribus.wupper.de / 10/95
  2.  
  3. IF NOT exists RAM:
  4.   Echo "Ohne die Ram-Disk *"RAM:*" funktioniert dieses Skript leider nicht!"
  5.   Echo "Auf jeder normalen Workbench sollte die RAM-Disk verfügbar sein."
  6.   Wait 5
  7.   Quit
  8. ENDIF
  9.  
  10. FailAt 240
  11. Stack 30000
  12. Set >NIL: Suchmuster ""
  13. Set Suchmuster `ESR "" TITLEBAR "Amiga Plus CD-ROM Index" MESSAGE "Bitte Suchbegriff eingeben:"`
  14. IF "$Suchmuster" EQ ""
  15.   QUIT
  16. ENDIF
  17.  
  18. Echo >RAM:Plus-CD-Temp-1 "@DATABASE Such-Guide"
  19. Echo >>RAM:Plus-CD-Temp-1 "@REMARK Von Sandro Paolini für Amiga Plus CD Vol. 1/96"
  20. Echo >>RAM:Plus-CD-Temp-1 "@NODE MAIN *"Gefundene Einträge auf >>$Suchmuster<<*""
  21. Echo >>RAM:Plus-CD-Temp-1 ""
  22. Echo >>RAM:Plus-CD-Temp-1 "Nr. | Verzeichnis"
  23. Echo >>RAM:Plus-CD-Temp-1 "================="
  24. AGrep >RAM:Plus-CD-Temp-2 -i "$Suchmuster" Index_3_4
  25. Echo >>RAM:Plus-CD-Temp-2 "@ENDNODE"
  26. Join RAM:Plus-CD-Temp-1 RAM:Plus-CD-Temp-2 TO RAM:Plus-CD-Suche.guide
  27. Delete >NIL: RAM:Plus-CD-Temp-1 RAM:Plus-CD-Temp-2
  28. Copy Shellstart RAM:
  29. Protect RAM:Shellstart +s
  30. :C/AmigaGuide RAM:Plus-CD-Suche.guide
  31. Delete >NIL: RAM:Plus-CD-Suche.guide RAM:Shellstart
  32. ENDCLI
  33.